Commodore Disk User Volume 2 #2

home *** CD-ROM | disk | FTP | other *** search
/ Commodore Disk User Volume 2 #2 / Commodore_Disk_User_Vol.2_2_1989_-_Side_B.d64 / menu maker < prev next >
Unknown | 1989-01-01 | 7.1 KB
view JSON data |
view as text |
open on a Mac |
open on a PC

This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence	Program	Detection	Match Type
`100%`	file	Commodore C128 BASIC program, offset 0x1c41, line 8000, token (0x8f) REM MENU CREATION ROUTINES FOR CBM 128 (40 OR 80 COLUMN), offset 0x1c6c, line 8010, token (0x8f) REM N.P. GREGORY AUGUST 1988	default (weak)
`99%`	file	SVr3 curses screen image, big-endian	default (weak)
`98%`	file	data	default
`100%`	TrID	Commodore 128 BASIC V7.0 program	default (weak)
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 01 1c 41 1c 40 1f 8f 20 | 20 20 20 20 20 4d 45 4e |..A.@.. |     MEN|
|00000010| 55 20 43 52 45 41 54 49 | 4f 4e 20 52 4f 55 54 49 |U CREATI|ON ROUTI|
|00000020| 4e 45 53 20 46 4f 52 20 | 43 42 4d 20 31 32 38 20 |NES FOR |CBM 128 |
|00000030| 28 34 30 20 4f 52 20 38 | 30 20 43 4f 4c 55 4d 4e |(40 OR 8|0 COLUMN|
|00000040| 29 00 6c 1c 4a 1f 8f 20 | 20 20 20 20 20 4e 2e 50 |).l.J.. |     N.P|
|00000050| 2e 20 47 52 45 47 4f 52 | 59 20 20 20 20 20 20 20 |. GREGOR|Y       |
|00000060| 41 55 47 55 53 54 20 20 | 31 39 38 38 00 72 1c 54 |AUGUST  |1988.r.T|
|00000070| 1f 8f 00 89 1c 5e 1f fe | 11 20 22 4d 45 4e 55 20 |.....^..|. "MENU |
|00000080| 4d 41 4b 45 52 2e 4d 43 | 22 00 ab 1c 68 1f 99 20 |MAKER.MC|"...h.. |
|00000090| c7 28 31 34 29 3a 8b 20 | c2 28 d1 28 22 44 37 22 |.(14):. |.(.("D7"|
|000000a0| 29 29 b1 31 32 37 20 a7 | 20 fe 25 00 b4 1c 72 1f |)).127 .| .%...r.|
|000000b0| fe 02 31 35 00 e8 1c 7c | 1f 8d 20 38 32 32 30 3a |..15...||.. 8220:|
|000000c0| 8f 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|000000d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 49 4e |        |      IN|
|000000e0| 49 54 49 41 4c 49 53 45 | 00 19 1d 86 1f 8d 20 38 |ITIALISE|...... 8|
|000000f0| 37 31 30 3a 8f 20 20 20 | 20 20 20 20 20 20 20 20 |710:.   |        |
|00000100| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000110| 20 20 44 4f 20 4d 45 4e | 55 00 1f 1d 90 1f 80 00 |  DO MEN|U.......|
|00000120| 25 1d 9a 1f 3a 00 2b 1d | a4 1f 8f 00 4c 1d ae 1f |%...:.+.|....L...|
|00000130| 8f 20 20 20 20 20 20 20 | 20 4d 45 4e 55 20 49 4e |.       | MENU IN|
|00000140| 49 54 49 41 4c 49 53 41 | 54 49 4f 4e 00 97 1d b8 |ITIALISA|TION....|
|00000150| 1f 8f 20 20 20 20 20 20 | 20 20 54 48 49 53 20 52 |..      |  THIS R|
|00000160| 4f 55 54 49 4e 45 20 4d | 55 53 54 20 42 45 20 43 |OUTINE M|UST BE C|
|00000170| 41 4c 4c 45 44 20 41 54 | 20 54 48 45 20 42 45 47 |ALLED AT| THE BEG|
|00000180| 49 4e 49 4e 47 20 4f 46 | 20 54 48 45 20 50 52 4f |INING OF| THE PRO|
|00000190| 47 52 41 4d 20 53 4f 00 | ca 1d c2 1f 8f 20 20 20 |GRAM SO.|.....   |
|000001a0| 20 20 20 20 20 54 48 41 | 54 20 54 48 45 20 4d 45 |     THA|T THE ME|
|000001b0| 4e 55 20 56 41 52 49 41 | 42 4c 45 53 20 43 41 4e |NU VARIA|BLES CAN|
|000001c0| 20 42 45 20 53 45 54 20 | 55 50 00 d0 1d cc 1f 8f | BE SET |UP......|
|000001d0| 00 19 1e d6 1f 8f 20 20 | 20 20 20 20 20 20 49 46 |......  |      IF|
|000001e0| 20 41 20 43 4f 4d 50 49 | 4c 45 52 20 49 53 20 54 | A COMPI|LER IS T|
|000001f0| 4f 20 42 45 20 55 53 45 | 44 20 4e 4f 54 45 20 54 |O BE USE|D NOTE T|
|00000200| 48 41 54 20 41 52 52 41 | 59 53 20 4d 41 59 20 48 |HAT ARRA|YS MAY H|
|00000210| 41 56 45 20 54 4f 20 42 | 45 00 63 1e e0 1f 8f 20 |AVE TO B|E.c.... |
|00000220| 20 20 20 20 20 20 20 44 | 49 4d 45 4e 54 49 4f 4e |       D|IMENTION|
|00000230| 45 44 20 41 54 20 54 48 | 45 20 42 45 47 49 4e 49 |ED AT TH|E BEGINI|
|00000240| 4e 47 20 4f 46 20 41 20 | 50 52 4f 47 52 41 4d 20 |NG OF A |PROGRAM |
|00000250| 41 4e 44 20 54 48 41 54 | 20 54 48 45 20 4e 55 4d |AND THAT| THE NUM|
|00000260| 42 45 52 00 a8 1e ea 1f | 8f 20 20 20 20 20 20 20 |BER.....|.       |
|00000270| 20 4f 46 20 53 55 42 53 | 43 52 49 50 54 53 20 4d | OF SUBS|CRIPTS M|
|00000280| 41 59 20 48 41 56 45 20 | 54 4f 20 42 45 20 41 42 |AY HAVE |TO BE AB|
|00000290| 53 4f 4c 55 54 45 20 41 | 4e 44 20 4e 4f 54 20 56 |SOLUTE A|ND NOT V|
|000002a0| 41 52 49 41 42 4c 45 53 | 00 f4 1e f4 1f 8f 20 20 |ARIABLES|......  |
|000002b0| 20 20 20 20 20 20 41 20 | 41 4e 44 20 41 31 20 48 |      A |AND A1 H|
|000002c0| 4f 4c 44 20 54 48 45 20 | 41 42 53 4f 55 54 45 20 |OLD THE |ABSOUTE |
|000002d0| 56 41 4c 55 45 53 20 46 | 4f 52 20 54 48 45 20 44 |VALUES F|OR THE D|
|000002e0| 49 4d 45 4e 54 49 4f 4e | 53 20 41 46 54 45 52 20 |IMENTION|S AFTER |
|000002f0| 54 48 49 53 00 10 1f fe | 1f 8f 20 20 20 20 20 20 |THIS....|..      |
|00000300| 20 20 52 4f 55 54 49 4e | 45 20 49 53 20 52 55 4e |  ROUTIN|E IS RUN|
|00000310| 00 5d 1f 08 20 8f 20 20 | 20 20 20 20 20 20 41 4c |.].. .  |      AL|
|00000320| 4c 20 56 41 52 49 41 42 | 4c 45 53 20 42 45 47 49 |L VARIAB|LES BEGI|
|00000330| 4e 49 4e 47 20 57 49 54 | 48 20 27 41 27 20 41 52 |NING WIT|H 'A' AR|
|00000340| 45 20 4e 4f 54 20 55 53 | 45 44 20 41 46 54 45 52 |E NOT US|ED AFTER|
|00000350| 20 54 48 49 53 20 52 4f | 55 54 49 4e 45 00 63 1f | THIS RO|UTINE.c.|
|00000360| 0d 20 8f 00 69 1f 12 20 | 3a 00 af 1f 1c 20 4d 53 |. ..i.. |:.... MS|
|00000370| 24 b2 22 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |$."     |        |
|00000380| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000390| 20 20 20 20 22 3a 8f 20 | 53 50 41 43 45 20 46 4f |    ":. |SPACE FO|
|000003a0| 52 20 4d 45 4e 55 20 42 | 41 52 20 28 33 33 29 00 |R MENU B|AR (33).|
|000003b0| fa 1f 26 20 4d 4c 24 b2 | 22 c0 c0 c0 c0 c0 c0 c0 |..& ML$.|".......|
|000003c0| c0 c0 c0 c0 c0 c0 c0 c0 | c0 c0 c0 c0 c0 c0 c0 c0 |........|........|
|000003d0| c0 c0 c0 c0 c0 c0 c0 c0 | c0 c0 22 3a 8f 20 4c 49 |........|..":. LI|
|000003e0| 4e 45 20 46 4f 52 20 4d | 45 4e 55 20 28 33 33 29 |NE FOR M|ENU (33)|
|000003f0| 3a 43 48 52 24 28 31 39 | 32 29 00 3c 20 30 20 41 |:CHR$(19|2).< 0 A|
|00000400| b2 30 3a 41 31 b2 30 3a | 41 32 b2 30 3a 41 33 b2 |.0:A1.0:|A2.0:A3.|
|00000410| 30 3a 41 34 b2 30 3a 41 | 35 b2 30 3a 8f 20 20 20 |0:A4.0:A|5.0:.   |
|00000420| 20 20 20 20 20 20 20 20 | 5a 45 52 4f 20 4c 4f 43 |        |ZERO LOC|
|00000430| 41 4c 20 56 41 52 49 41 | 42 4c 45 53 00 76 20 3a |AL VARIA|BLES.v :|
|00000440| 20 8c 3a 8f 20 20 20 20 | 20 20 20 20 20 20 20 20 | .:.    |        |
|00000450| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000460| 20 20 20 20 52 45 53 45 | 54 20 44 41 54 41 20 50 |    RESE|T DATA P|
|00000470| 4f 49 4e 54 45 52 00 bb | 20 44 20 87 20 41 3a 8f |OINTER..| D . A:.|
|00000480| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000490| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000004a0| 20 4e 55 4d 42 45 52 20 | 4f 46 20 54 4f 50 20 4d | NUMBER |OF TOP M|
|000004b0| 45 4e 55 20 4f 50 54 49 | 4f 4e 53 00 f3 20 4e 20 |ENU OPTI|ONS.. N |
|000004c0| 87 20 41 35 3a 8f 20 20 | 20 20 20 20 20 20 20 20 |. A5:.  |        |
|000004d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000004e0| 20 20 20 20 20 20 45 58 | 49 54 2f 45 4e 44 20 46 |      EX|IT/END F|
|000004f0| 4c 41 47 00 fd 20 58 20 | 41 b2 41 ab 31 00 3d 21 |LAG.. X |A.A.1.=!|
|00000500| 62 20 86 20 4d 45 4e 55 | 24 28 41 29 2c 4d 45 4e |b . MENU|$(A),MEN|
|00000510| 55 25 28 35 29 3a 8f 20 | 20 20 20 20 20 20 20 20 |U%(5):. |        |
|00000520| 20 20 20 20 20 20 20 20 | 20 4f 50 45 4e 20 54 4f |        | OPEN TO|
|00000530| 50 20 4d 45 4e 55 20 41 | 52 52 41 59 53 00 4c 21 |P MENU A|RRAYS.L!|
|00000540| 6c 20 81 20 41 31 b2 30 | 20 a4 20 41 00 95 21 76 |l . A1.0| . A..!v|
|00000550| 20 3a 87 20 4d 45 4e 55 | 24 28 41 31 29 3a 8f 20 | :. MENU|$(A1):. |
|00000560| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000570| 20 20 20 20 20 20 20 41 | 4e 44 20 46 49 4c 4c 20 |       A|ND FILL |
|00000580| 57 49 54 48 20 54 4f 50 | 20 4d 45 4e 55 20 4f 50 |WITH TOP| MENU OP|
|00000590| 54 49 4f 4e 53 00 b6 21 | 80 20 3a 4d 45 4e 55 24 |TIONS..!|. :MENU$|
|000005a0| 28 41 31 29 b2 22 20 22 | aa 4d 45 4e 55 24 28 41 |(A1)." "|.MENU$(A|
|000005b0| 31 29 aa 22 20 22 00 fe | 21 8a 20 3a 41 32 b2 41 |1)." "..|!. :A2.A|
|000005c0| 32 aa c3 28 4d 45 4e 55 | 24 28 41 31 29 29 3a 8f |2..(MENU|$(A1)):.|
|000005d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000005e0| 20 20 41 44 44 20 55 50 | 20 4f 50 54 49 4f 4e 20 |  ADD UP| OPTION |
|000005f0| 53 54 52 49 4e 47 20 4c | 45 4e 47 54 48 53 00 07 |STRING L|ENGTHS..|
|00000600| 22 94 20 82 20 41 31 00 | 44 22 9e 20 81 20 41 31 |". . A1.|D". . A1|
|00000610| b2 30 20 a4 20 35 3a 8f | 20 20 20 20 20 20 20 20 |.0 . 5:.|        |
|00000620| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000630| 20 20 5a 45 52 4f 20 4e | 55 4d 45 52 49 43 20 41 |  ZERO N|UMERIC A|
|00000640| 52 52 41 59 00 55 22 a8 | 20 3a 4d 45 4e 55 25 28 |RRAY.U".| :MENU%(|
|00000650| 41 31 29 b2 30 00 5e 22 | b2 20 82 20 41 31 00 a7 |A1).0.^"|. . A1..|
|00000660| 22 bc 20 4d 45 4e 55 25 | 28 33 29 b2 41 32 ab c3 |". MENU%|(3).A2..|
|00000670| 28 4d 45 4e 55 24 28 41 | 29 29 3a 8f 20 20 20 20 |(MENU$(A|)):.    |
|00000680| 20 20 20 20 20 20 20 20 | 20 20 54 4f 54 41 4c 20 |        |  TOTAL |
|00000690| 4c 45 4e 47 54 48 20 4d | 49 4e 55 53 20 4f 4e 45 |LENGTH M|INUS ONE|
|000006a0| 20 4f 50 54 49 4f 4e 00 | ec 22 c6 20 4d 45 4e 55 | OPTION.|.". MENU|
|000006b0| 25 28 35 29 b2 41 3a 8f | 20 20 20 20 20 20 20 20 |%(5).A:.|        |
|000006c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000006d0| 20 20 20 20 20 54 4f 54 | 41 4c 20 4e 55 4d 42 45 |     TOT|AL NUMBE|
|000006e0| 52 20 4f 46 20 4f 50 54 | 49 4f 4e 53 00 23 23 d0 |R OF OPT|IONS.##.|
|000006f0| 20 8b 20 41 35 20 a7 20 | 4d 45 4e 55 25 28 35 29 | . A5 . |MENU%(5)|
|00000700| b2 41 aa 31 32 38 3a 8f | 20 20 20 20 20 20 20 20 |.A.128:.|        |
|00000710| 20 20 20 20 20 20 53 45 | 54 20 45 58 49 54 20 46 |      SE|T EXIT F|
|00000720| 4c 41 47 00 29 23 da 20 | 8f 00 52 23 e4 20 8f 20 |LAG.)#. |..R#. . |
|00000730| 20 20 20 20 20 20 20 49 | 4e 49 54 49 41 4c 49 53 |       I|NITIALIS|
|00000740| 45 20 53 55 42 20 4d 45 | 4e 55 20 4f 50 54 49 4f |E SUB ME|NU OPTIO|
|00000750| 4e 53 00 58 23 ee 20 8f | 00 9e 23 f8 20 87 20 41 |NS.X#. .|..#. . A|
|00000760| 31 3a 8f 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |1:.     |        |
|00000770| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000780| 20 20 20 52 45 41 44 20 | 54 4f 54 41 4c 20 53 55 |   READ |TOTAL SU|
|00000790| 42 20 4d 45 4e 55 20 4f | 50 54 49 4f 4e 53 00 aa |B MENU O|PTIONS..|
|000007a0| 23 02 21 41 31 b2 41 31 | ab 31 00 b3 23 0c 21 41 |#.!A1.A1|.1..#.!A|
|000007b0| 35 b2 30 00 f9 23 16 21 | 86 20 53 55 42 4d 45 4e |5.0..#.!|. SUBMEN|
|000007c0| 55 24 28 41 31 29 2c 53 | 55 42 4d 45 4e 55 25 28 |U$(A1),S|UBMENU%(|
|000007d0| 41 ac 32 aa 31 29 3a 8f | 20 20 20 20 20 20 20 4f |A.2.1):.|       O|
|000007e0| 50 45 4e 20 53 55 42 4d | 45 4e 55 20 4f 50 54 49 |PEN SUBM|ENU OPTI|
|000007f0| 4f 4e 53 20 41 52 52 41 | 59 00 41 24 20 21 81 20 |ONS ARRA|Y.A$ !. |
|00000800| 41 32 b2 30 20 a4 20 41 | 3a 8f 20 20 20 20 20 20 |A2.0 . A|:.      |
|00000810| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000820| 20 20 20 20 41 4e 44 20 | 46 49 4c 4c 20 57 49 54 |    AND |FILL WIT|
|00000830| 48 20 53 55 42 4d 45 4e | 55 20 4f 50 54 49 4f 4e |H SUBMEN|U OPTION|
|00000840| 53 00 82 24 2a 21 3a 41 | 36 b2 30 3a 8f 20 20 20 |S..$*!:A|6.0:.   |
|00000850| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000860| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 5a |        |       Z|
|00000870| 45 52 4f 20 4c 45 4e 47 | 54 48 20 50 4f 49 4e 54 |ERO LENG|TH POINT|
|00000880| 45 52 00 c8 24 34 21 3a | 87 20 41 33 3a 8f 20 20 |ER..$4!:|. A3:.  |
|00000890| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000008a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 4e 55 4d |        |     NUM|
|000008b0| 42 45 52 20 49 4e 20 43 | 55 52 52 45 4e 54 20 53 |BER IN C|URRENT S|
|000008c0| 55 42 4f 50 54 49 4f 4e | 00 10 25 3e 21 3a 53 55 |UBOPTION|..%>!:SU|
|000008d0| 42 4d 45 4e 55 25 28 41 | 32 ac 32 29 b2 41 35 3a |BMENU%(A|2.2).A5:|
|000008e0| 8f 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.       |        |
|000008f0| 20 20 20 20 20 20 53 54 | 41 52 54 20 53 55 42 53 |      ST|ART SUBS|
|00000900| 43 52 49 50 54 20 4f 46 | 20 53 55 42 4d 45 4e 55 |CRIPT OF| SUBMENU|
|00000910| 00 23 25 48 21 3a 81 20 | 41 34 b2 30 20 a4 20 41 |.#%H!:. |A4.0 . A|
|00000920| 33 ab 31 00 62 25 52 21 | 3a 20 87 20 53 55 42 4d |3.1.b%R!|: . SUBM|
|00000930| 45 4e 55 24 28 41 35 aa | 41 34 29 3a 8f 20 20 20 |ENU$(A5.|A4):.   |
|00000940| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 52 45 |        |      RE|
|00000950| 41 44 20 53 55 42 4d 45 | 4e 55 20 4f 50 54 49 4f |AD SUBME|NU OPTIO|
|00000960| 4e 53 00 98 25 5c 21 3a | 20 8b 20 c3 28 53 55 42 |NS..%\!:| . .(SUB|
|00000970| 4d 45 4e 55 24 28 41 35 | aa 41 34 29 29 b1 41 36 |MENU$(A5|.A4)).A6|
|00000980| 20 a7 20 41 36 b2 c3 28 | 53 55 42 4d 45 4e 55 24 | . A6..(|SUBMENU$|
|00000990| 28 41 35 aa 41 34 29 29 | 00 a2 25 66 21 3a 82 20 |(A5.A4))|..%f!:. |
|000009a0| 41 34 00 e9 25 70 21 3a | 81 20 41 34 b2 30 20 a4 |A4..%p!:|. A4.0 .|
|000009b0| 20 41 33 ab 31 3a 8f 20 | 20 20 20 20 20 20 20 20 | A3.1:. |        |
|000009c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 41 44 4a |        |     ADJ|
|000009d0| 55 53 54 20 4f 50 54 49 | 4f 4e 20 53 54 52 49 4e |UST OPTI|ON STRIN|
|000009e0| 47 20 4c 45 4e 47 54 48 | 53 00 09 26 7a 21 3a 20 |G LENGTH|S..&z!: |
|000009f0| 8b 20 c3 28 53 55 42 4d | 45 4e 55 24 28 41 35 29 |. .(SUBM|ENU$(A5)|
|00000a00| 29 b3 41 36 20 a7 20 fe | 18 00 44 26 84 21 3a 20 |).A6 . .|..D&.!: |
|00000a10| 20 53 55 42 4d 45 4e 55 | 24 28 41 35 29 b2 53 55 | SUBMENU|$(A5).SU|
|00000a20| 42 4d 45 4e 55 24 28 41 | 35 29 aa c8 28 4d 53 24 |BMENU$(A|5)..(MS$|
|00000a30| 2c 41 36 ab c3 28 53 55 | 42 4d 45 4e 55 24 28 41 |,A6..(SU|BMENU$(A|
|00000a40| 35 29 29 29 00 4d 26 8e | 21 3a 20 fe 19 00 84 26 |5))).M&.|!: ....&|
|00000a50| 98 21 3a 20 41 35 b2 41 | 35 aa 31 3a 8f 20 20 20 |.!: A5.A|5.1:.   |
|00000a60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000a70| 20 20 20 20 20 20 20 20 | 20 20 20 55 50 44 41 54 |        |   UPDAT|
|00000a80| 45 20 41 35 00 8e 26 a2 | 21 3a 82 20 41 34 00 c9 |E A5..&.|!:. A4..|
|00000a90| 26 ac 21 3a 53 55 42 4d | 45 4e 55 25 28 41 32 ac |&.!:SUBM|ENU%(A2.|
|00000aa0| 32 aa 31 29 b2 41 35 ab | 31 3a 8f 20 20 20 20 20 |2.1).A5.|1:.     |
|00000ab0| 20 20 20 20 20 20 20 20 | 20 20 20 20 45 4e 44 20 |        |    END |
|00000ac0| 53 55 42 53 43 52 49 50 | 54 00 d2 26 b6 21 82 20 |SUBSCRIP|T..&.!. |
|00000ad0| 41 32 00 d8 26 c0 21 8e | 00 de 26 ca 21 3a 00 1c |A2..&.!.|..&.!:..|
|00000ae0| 27 d4 21 8f 20 20 43 41 | 4c 4c 20 54 48 49 53 20 |'.!.  CA|LL THIS |
|00000af0| 52 4f 55 54 49 4e 45 20 | 54 4f 20 41 43 54 49 56 |ROUTINE |TO ACTIV|
|00000b00| 41 54 45 20 54 48 45 20 | 4d 45 4e 55 3a 20 20 4f |ATE THE |MENU:  O|
|00000b10| 4e 20 52 45 54 55 52 4e | 2e 2e 2e 2e 00 5c 27 de |N RETURN|.....\'.|
|00000b20| 21 8f 20 20 4d 32 25 20 | 49 53 20 54 48 45 20 4e |!.  M2% |IS THE N|
|00000b30| 55 4d 42 45 52 20 4f 46 | 20 54 48 45 20 48 4f 52 |UMBER OF| THE HOR|
|00000b40| 49 5a 4f 4e 54 41 4c 20 | 4f 50 54 49 4f 4e 20 43 |IZONTAL |OPTION C|
|00000b50| 48 4f 53 45 4e 20 46 52 | 4f 4d 20 31 00 9a 27 e8 |HOSEN FR|OM 1..'.|
|00000b60| 21 8f 20 20 4d 38 25 20 | 49 53 20 54 48 45 20 4e |!.  M8% |IS THE N|
|00000b70| 55 4d 42 45 52 20 4f 46 | 20 54 48 45 20 56 45 52 |UMBER OF| THE VER|
|00000b80| 54 49 43 41 4c 20 4f 50 | 54 49 4f 4e 20 43 48 4f |TICAL OP|TION CHO|
|00000b90| 53 45 4e 20 46 52 4f 4d | 20 31 00 c4 27 f2 21 8f |SEN FROM| 1..'.!.|
|00000ba0| 20 20 49 46 20 4d 25 3e | 31 32 37 20 54 48 45 4e |  IF M%>|127 THEN|
|00000bb0| 20 42 41 52 20 4f 4e 4c | 59 20 49 53 20 50 52 49 | BAR ONL|Y IS PRI|
|00000bc0| 4e 54 45 44 00 ca 27 fc | 21 3a 00 13 28 06 22 4d |NTED..'.|!:..(."M|
|00000bd0| 30 25 b2 4d 45 4e 55 25 | 28 30 29 3a 4d 31 25 b2 |0%.MENU%|(0):M1%.|
|00000be0| 4d 45 4e 55 25 28 31 29 | 3a 4d 32 25 b2 4d 45 4e |MENU%(1)|:M2%.MEN|
|00000bf0| 55 25 28 32 29 3a 8f 20 | 20 20 20 20 20 20 20 20 |U%(2):. |        |
|00000c00| 53 45 54 20 4c 4f 43 41 | 4c 20 56 41 52 49 41 42 |SET LOCA|L VARIAB|
|00000c10| 4c 45 53 00 44 28 10 22 | 4d 33 25 b2 4d 45 4e 55 |LES.D(."|M3%.MENU|
|00000c20| 25 28 33 29 3a 4d 34 25 | b2 4d 45 4e 55 25 28 34 |%(3):M4%|.MENU%(4|
|00000c30| 29 3a 4d 35 25 b2 4d 45 | 4e 55 25 28 35 29 20 af |):M5%.ME|NU%(5) .|
|00000c40| 20 31 32 37 00 83 28 1a | 22 8b 20 c2 28 32 31 35 | 127..(.|". .(215|
|00000c50| 29 b2 31 32 38 20 a7 20 | 4d 44 25 b2 37 39 3a d5 |).128 . |MD%.79:.|
|00000c60| 20 4d 44 25 b2 33 39 3a | 8f 20 20 20 20 20 20 20 | MD%.39:|.       |
|00000c70| 53 45 54 20 46 4f 52 20 | 53 43 52 45 45 4e 20 4d |SET FOR |SCREEN M|
|00000c80| 4f 44 45 00 cd 28 24 22 | 4d 36 25 b2 28 4d 44 25 |ODE..($"|M6%.(MD%|
|00000c90| ab 28 4d 33 25 aa c3 28 | 4d 45 4e 55 24 28 4d 35 |.(M3%..(|MENU$(M5|
|00000ca0| 25 29 29 29 29 ad 32 3a | 8f 20 20 20 20 20 20 20 |%)))).2:|.       |
|00000cb0| 20 20 20 20 20 20 20 43 | 41 4c 43 55 4c 41 54 45 |       C|ALCULATE|
|00000cc0| 20 54 41 42 20 50 4f 53 | 49 54 49 4f 4e 00 0a 29 | TAB POS|ITION..)|
|00000cd0| 2e 22 8b 20 4d 36 25 b3 | 31 20 a7 20 99 3a 99 20 |.". M6%.|1 . .:. |
|00000ce0| 22 54 4f 4f 20 4d 41 4e | 59 20 4f 50 54 49 4f 4e |"TOO MAN|Y OPTION|
|00000cf0| 53 20 49 4e 20 54 4f 50 | 20 4d 45 4e 55 20 54 4f |S IN TOP| MENU TO|
|00000d00| 20 46 4f 52 4d 41 54 22 | 3a 80 00 4a 29 38 22 4d | FORMAT"|:..J)8"M|
|00000d10| 24 b2 c7 28 31 38 29 aa | c8 28 4d 53 24 2c 4d 36 |$..(18).|.(MS$,M6|
|00000d20| 25 29 3a 8f 20 20 20 20 | 20 20 20 20 20 20 20 20 |%):.    |        |
|00000d30| 20 20 20 20 20 20 20 20 | 20 54 41 42 20 53 54 52 |        | TAB STR|
|00000d40| 49 4e 47 20 49 4e 20 52 | 56 53 00 93 29 42 22 8b |ING IN R|VS..)B".|
|00000d50| 20 4d 30 25 b2 30 20 a7 | 20 4d 30 25 b2 4d 36 25 | M0%.0 .| M0%.M6%|
|00000d60| 3a 8f 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |:.      |        |
|00000d70| 20 20 20 20 20 20 20 20 | 20 20 20 20 53 54 41 52 |        |    STAR|
|00000d80| 54 20 4f 50 54 49 4f 4e | 20 43 4f 4f 52 44 49 4e |T OPTION| COORDIN|
|00000d90| 41 54 45 00 d1 29 4c 22 | 4d 45 25 b2 c2 28 32 32 |ATE..)L"|ME%..(22|
|00000da0| 38 29 3a 4d 46 25 b2 c2 | 28 32 32 39 29 3a 4d 47 |8):MF%..|(229):MG|
|00000db0| 25 b2 c2 28 32 33 30 29 | 3a 4d 48 25 b2 c2 28 32 |%..(230)|:MH%..(2|
|00000dc0| 33 31 29 3a 8f 20 53 41 | 56 45 20 57 49 4e 44 4f |31):. SA|VE WINDO|
|00000dd0| 57 00 09 2a 56 22 99 20 | c7 28 31 39 29 3b c7 28 |W..*V". |.(19);.(|
|00000de0| 31 39 29 3b 3a 8f 20 20 | 20 20 20 20 20 20 20 20 |19);:.  |        |
|00000df0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 43 4c 45 |        |     CLE|
|00000e00| 41 52 20 57 49 4e 44 4f | 57 00 48 2a 60 22 99 20 |AR WINDO|W.H*`". |
|00000e10| 4d 24 3b 3a 8f 20 20 20 | 20 20 20 20 20 20 20 20 |M$;:.   |        |
|00000e20| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000e30| 20 20 20 20 20 20 20 20 | 20 20 20 50 52 49 4e 54 |        |   PRINT|
|00000e40| 20 4f 50 54 49 4f 4e 53 | 00 58 2a 6a 22 81 20 4d | OPTIONS|.X*j". M|
|00000e50| b2 30 20 a4 20 4d 35 25 | 00 83 2a 74 22 3a 99 20 |.0 . M5%|..*t":. |
|00000e60| c7 28 31 38 29 3b 3a 8b | 20 4d b2 4d 32 25 20 af |.(18);:.| M.M2% .|
|00000e70| 20 4d 25 b3 31 32 37 20 | a7 20 99 20 c7 28 31 34 | M%.127 |. . .(14|
|00000e80| 36 29 3b 00 94 2a 7e 22 | 3a 99 20 4d 45 4e 55 24 |6);..*~"|:. MENU$|
|00000e90| 28 4d 29 3b 00 9c 2a 88 | 22 82 20 4d 00 b1 2a 92 |(M);..*.|". M..*.|
|00000ea0| 22 99 20 4d 24 3b 22 20 | 22 3b c7 28 31 34 36 29 |". M$;" |";.(146)|
|00000eb0| 3b 00 f0 2a 9c 22 8b 20 | 4d 25 20 b1 20 31 32 37 |;..*.". |M% . 127|
|00000ec0| 20 a7 20 8e 3a 8f 20 20 | 20 20 20 20 20 20 20 20 | . .:.  |        |
|00000ed0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 50 52 |        |      PR|
|00000ee0| 49 4e 54 20 4f 50 54 49 | 4f 4e 53 20 4f 4e 4c 59 |INT OPTI|ONS ONLY|
|00000ef0| 00 f6 2a a6 22 eb 00 09 | 2b b0 22 3a a1 f9 20 4d |..*."...|+.":.. M|
|00000f00| 24 3a 4d b2 c6 28 4d 24 | 29 00 4b 2b ba 22 3a 8b |$:M..(M$|).K+.":.|
|00000f10| 20 4d b2 31 33 20 b0 20 | 4d b2 31 37 20 a7 20 8d | M.13 . |M.17 . .|
|00000f20| 20 39 30 39 30 3a 8f 20 | 20 20 20 20 20 20 20 20 | 9090:. |        |
|00000f30| 20 20 20 20 20 20 43 52 | 20 4f 52 20 43 55 52 20 |      CR| OR CUR |
|00000f40| 44 4f 57 4e 20 28 53 55 | 42 53 29 00 83 2b c4 22 |DOWN (SU|BS)..+."|
|00000f50| 3a 8b 20 4d b2 32 39 20 | a7 20 fe 18 3a 8f 20 20 |:. M.29 |. ..:.  |
|00000f60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000f70| 20 20 20 20 20 20 20 20 | 20 20 43 55 52 20 52 49 |        |  CUR RI|
|00000f80| 47 48 54 00 a0 2b ce 22 | 3a 20 e0 20 31 2c 4d 30 |GHT..+."|: . 1,M0|
|00000f90| 25 2c 30 2c 4d 45 4e 55 | 24 28 4d 32 25 29 2c 31 |%,0,MENU|$(M2%),1|
|00000fa0| 00 e0 2b d8 22 3a 20 4d | 30 25 b2 4d 30 25 aa c3 |..+.": M|0%.M0%..|
|00000fb0| 28 4d 45 4e 55 24 28 4d | 32 25 29 29 3a 4d 32 25 |(MENU$(M|2%)):M2%|
|00000fc0| b2 4d 32 25 aa 31 3a 8b | 20 4d 32 25 b1 4d 35 25 |.M2%.1:.| M2%.M5%|
|00000fd0| 20 a7 20 4d 32 25 b2 30 | 3a 4d 30 25 b2 4d 36 25 | . M2%.0|:M0%.M6%|
|00000fe0| 00 fb 2b e2 22 3a 20 e0 | 20 31 2c 4d 30 25 2c 30 |..+.": .| 1,M0%,0|
|00000ff0| 2c 4d 45 4e 55 24 28 4d | 32 25 29 00 03 2c ec 22 |,MENU$(M|2%)..,."|
|00001000| 3a fe 19 00 3a 2c f6 22 | 3a 8b 20 4d b2 31 35 37 |:...:,."|:. M.157|
|00001010| 20 a7 20 fe 18 3a 8f 20 | 20 20 20 20 20 20 20 20 | . ..:. |        |
|00001020| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001030| 20 20 43 55 52 20 4c 45 | 46 54 00 57 2c 00 23 3a |  CUR LE|FT.W,.#:|
|00001040| 20 e0 20 31 2c 4d 30 25 | 2c 30 2c 4d 45 4e 55 24 | . 1,M0%|,0,MENU$|
|00001050| 28 4d 32 25 29 2c 31 00 | 67 2c 0a 23 3a 20 4d 32 |(M2%),1.|g,.#: M2|
|00001060| 25 b2 4d 32 25 ab 31 00 | a3 2c 14 23 3a 20 8b 20 |%.M2%.1.|.,.#: . |
|00001070| 4d 32 25 b3 30 20 a7 20 | 4d 32 25 b2 4d 35 25 3a |M2%.0 . |M2%.M5%:|
|00001080| 4d 30 25 b2 4d 33 25 aa | 4d 36 25 3a d5 20 4d 30 |M0%.M3%.|M6%:. M0|
|00001090| 25 b2 4d 30 25 ab c3 28 | 4d 45 4e 55 24 28 4d 32 |%.M0%..(|MENU$(M2|
|000010a0| 25 29 29 00 be 2c 1e 23 | 3a 20 e0 20 31 2c 4d 30 |%))..,.#|: . 1,M0|
|000010b0| 25 2c 30 2c 4d 45 4e 55 | 24 28 4d 32 25 29 00 c6 |%,0,MENU|$(M2%)..|
|000010c0| 2c 28 23 3a fe 19 00 03 | 2d 32 23 ec 20 fc 20 4d |,(#:....|-2#. . M|
|000010d0| b2 30 20 b0 20 4d b2 32 | 37 20 b0 20 4d b2 32 35 |.0 . M.2|7 . M.25|
|000010e0| 35 3a 8f 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |5:.     |        |
|000010f0| 20 20 20 32 35 35 20 49 | 53 20 45 58 49 54 20 43 |   255 I|S EXIT C|
|00001100| 4f 44 45 00 1e 2d 3c 23 | e0 20 31 2c 4d 30 25 2c |ODE..-<#|. 1,M0%,|
|00001110| 30 2c 4d 45 4e 55 24 28 | 4d 32 25 29 2c 31 00 62 |0,MENU$(|M2%),1.b|
|00001120| 2d 46 23 4d 45 4e 55 25 | 28 30 29 b2 4d 30 25 3a |-F#MENU%|(0).M0%:|
|00001130| 4d 45 4e 55 25 28 32 29 | b2 4d 32 25 3a 4d 32 25 |MENU%(2)|.M2%:M2%|
|00001140| b2 4d 32 25 aa 31 3a 8f | 20 20 20 20 20 20 20 20 |.M2%.1:.|        |
|00001150| 20 20 20 20 45 58 49 54 | 20 56 41 52 49 41 42 4c |    EXIT| VARIABL|
|00001160| 45 53 00 9e 2d 50 23 97 | 20 32 32 38 2c 4d 45 25 |ES..-P#.| 228,ME%|
|00001170| 3a 97 20 32 32 39 2c 4d | 46 25 3a 97 20 32 33 30 |:. 229,M|F%:. 230|
|00001180| 2c 4d 47 25 3a 97 20 32 | 33 31 2c 4d 48 25 3a 8f |,MG%:. 2|31,MH%:.|
|00001190| 20 20 52 45 4e 45 57 20 | 57 49 4e 44 4f 57 00 a4 |  RENEW |WINDOW..|
|000011a0| 2d 5a 23 8e 00 aa 2d 64 | 23 3a 00 d4 2d 6e 23 8f |-Z#...-d|#:..-n#.|
|000011b0| 20 20 50 55 54 20 56 45 | 52 54 49 43 41 4c 20 4f |  PUT VE|RTICAL O|
|000011c0| 50 54 49 4f 4e 53 20 4f | 4e 54 4f 20 42 41 52 20 |PTIONS O|NTO BAR |
|000011d0| 4d 45 4e 55 00 da 2d 78 | 23 3a 00 23 2e 82 23 4d |MENU..-x|#:.#..#M|
|000011e0| 41 25 b2 30 3a 4d 42 25 | b2 28 4d 32 25 ab 4d 34 |A%.0:MB%|.(M2%.M4|
|000011f0| 25 29 ac 32 3a 4d 43 25 | b2 4d 30 25 3a 8f 20 20 |%).2:MC%|.M0%:.  |
|00001200| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001210| 53 45 54 20 4c 4f 43 41 | 4c 20 56 41 52 49 41 42 |SET LOCA|L VARIAB|
|00001220| 4c 45 53 00 61 2e 8c 23 | 9e 20 d1 28 22 30 43 30 |LES.a..#|. .("0C0|
|00001230| 33 22 29 2c 33 aa 53 55 | 42 4d 45 4e 55 25 28 4d |3"),3.SU|BMENU%(M|
|00001240| 42 25 aa 31 29 ab 53 55 | 42 4d 45 4e 55 25 28 4d |B%.1).SU|BMENU%(M|
|00001250| 42 25 29 3a 8f 20 53 41 | 56 45 20 53 43 52 45 45 |B%):. SA|VE SCREE|
|00001260| 4e 00 95 2e 96 23 8b 20 | c3 28 53 55 42 4d 45 4e |N....#. |.(SUBMEN|
|00001270| 55 24 28 53 55 42 4d 45 | 4e 55 25 28 4d 42 25 29 |U$(SUBME|NU%(MB%)|
|00001280| 29 29 aa 33 aa 4d 30 25 | 20 b1 20 4d 44 25 ab 31 |)).3.M0%| . MD%.1|
|00001290| 20 a7 20 fe 18 00 e0 2e | a0 23 3a 4d 43 25 b2 4d | . .....|.#:MC%.M|
|000012a0| 44 25 ab 28 c3 28 53 55 | 42 4d 45 4e 55 24 28 53 |D%.(.(SU|BMENU$(S|
|000012b0| 55 42 4d 45 4e 55 25 28 | 4d 42 25 29 29 29 aa 33 |UBMENU%(|MB%))).3|
|000012c0| 29 3a 8f 20 20 20 20 20 | 20 41 44 4a 55 53 54 20 |):.     | ADJUST |
|000012d0| 53 55 42 4d 45 4e 55 20 | 50 52 49 4e 54 49 4e 47 |SUBMENU |PRINTING|
|000012e0| 00 e7 2e aa 23 fe 19 00 | 2f 2f b4 23 81 20 4d b2 |....#...|//.#. M.|
|000012f0| 53 55 42 4d 45 4e 55 25 | 28 4d 42 25 29 20 a4 20 |SUBMENU%|(MB%) . |
|00001300| 53 55 42 4d 45 4e 55 25 | 28 4d 42 25 aa 31 29 3a |SUBMENU%|(MB%.1):|
|00001310| 8f 20 20 20 20 20 20 20 | 20 20 41 4e 44 20 50 52 |.       |  AND PR|
|00001320| 49 4e 54 20 53 55 42 20 | 4f 50 54 49 4f 4e 53 00 |INT SUB |OPTIONS.|
|00001330| 64 2f be 23 3a 4d 41 25 | b2 4d 41 25 aa 31 3a e0 |d/.#:MA%|.MA%.1:.|
|00001340| 20 31 2c 4d 43 25 2c 4d | 31 25 aa 4d 41 25 2c 22 | 1,MC%,M|1%.MA%,"|
|00001350| dd 22 aa 53 55 42 4d 45 | 4e 55 24 28 4d 29 aa 22 |.".SUBME|NU$(M)."|
|00001360| dd 22 2c 31 00 6c 2f c8 | 23 82 20 4d 00 a4 2f d2 |.",1.l/.|#. M../.|
|00001370| 23 e0 20 31 2c 4d 43 25 | 2c 4d 31 25 aa 4d 41 25 |#. 1,MC%|,M1%.MA%|
|00001380| aa 31 2c 22 ad 22 aa c8 | 28 4d 4c 24 2c c3 28 53 |.1,"."..|(ML$,.(S|
|00001390| 55 42 4d 45 4e 55 24 28 | 4d ab 31 29 29 29 aa 22 |UBMENU$(|M.1)))."|
|000013a0| bd 22 2c 31 00 e8 2f dc | 23 4d 37 25 b2 53 55 42 |.",1../.|#M7%.SUB|
|000013b0| 4d 45 4e 55 25 28 4d 42 | 25 aa 31 29 ab 53 55 42 |MENU%(MB|%.1).SUB|
|000013c0| 4d 45 4e 55 25 28 4d 42 | 25 29 3a 4d 38 25 b2 30 |MENU%(MB|%):M8%.0|
|000013d0| 3a 4d 39 25 b2 30 3a 4d | 41 25 b2 53 55 42 4d 45 |:M9%.0:M|A%.SUBME|
|000013e0| 4e 55 25 28 4d 42 25 29 | 00 00 30 e6 23 e0 20 31 |NU%(MB%)|..0.#. 1|
|000013f0| 2c 4d 43 25 aa 31 2c 4d | 31 25 aa 4d 38 25 aa 31 |,MC%.1,M|1%.M8%.1|
|00001400| 00 2f 30 f0 23 8b 20 4d | 37 25 b2 30 20 a7 20 99 |./0.#. M|7%.0 . .|
|00001410| 20 c7 28 31 38 29 3b 53 | 55 42 4d 45 4e 55 24 28 | .(18);S|UBMENU$(|
|00001420| 4d 41 25 aa 4d 38 25 29 | 3b c7 28 31 34 36 29 00 |MA%.M8%)|;.(146).|
|00001430| 51 30 fa 23 8b 20 4d 37 | 25 b1 30 20 a7 20 99 20 |Q0.#. M7|%.0 . . |
|00001440| 53 55 42 4d 45 4e 55 24 | 28 4d 41 25 aa 4d 38 25 |SUBMENU$|(MA%.M8%|
|00001450| 29 00 57 30 04 24 eb 00 | 6a 30 0e 24 3a a1 f9 20 |).W0.$..|j0.$:.. |
|00001460| 4d 24 3a 4d b2 c6 28 4d | 24 29 00 ab 30 18 24 3a |M$:M..(M|$)..0.$:|
|00001470| 8b 20 4d 32 25 ab 4d 34 | 25 b2 4d 35 25 20 af 20 |. M2%.M4|%.M5% . |
|00001480| 4d 45 4e 55 25 28 35 29 | b1 31 32 37 20 a7 20 fe |MENU%(5)|.127 . .|
|00001490| 18 3a 8f 20 20 20 20 45 | 58 49 54 20 57 49 54 48 |.:.    E|XIT WITH|
|000014a0| 20 27 59 27 20 4f 52 20 | 27 4e 27 00 e8 30 22 24 | 'Y' OR |'N'..0"$|
|000014b0| 3a 20 eb 20 fc 20 28 4d | 20 af 20 31 32 37 29 b2 |: . . (M| . 127).|
|000014c0| 37 38 20 b0 20 28 4d 20 | af 20 31 32 37 29 b2 38 |78 . (M |. 127).8|
|000014d0| 39 3a 8f 20 20 20 20 44 | 45 50 45 4e 44 49 4e 47 |9:.    D|EPENDING|
|000014e0| 20 4f 4e 20 46 4c 41 47 | 00 fd 30 2c 24 3a 20 20 | ON FLAG|..0,$:  |
|000014f0| a1 f9 20 4d 24 3a 4d b2 | c6 28 4d 24 29 00 05 31 |.. M$:M.|.(M$)..1|
|00001500| 36 24 3a 20 ec 00 29 31 | 40 24 3a 20 8b 20 28 4d |6$: ..)1|@$: . (M|
|00001510| 20 af 20 31 32 37 29 b2 | 37 38 20 a7 20 4d b2 32 | . 127).|78 . M.2|
|00001520| 37 3a d5 20 4d b2 32 35 | 35 00 31 31 4a 24 3a fe |7:. M.25|5.11J$:.|
|00001530| 19 00 68 31 54 24 3a 8b | 20 4d b2 31 37 20 a7 20 |..h1T$:.| M.17 . |
|00001540| fe 18 3a 8f 20 20 20 20 | 20 20 20 20 20 20 20 20 |..:.    |        |
|00001550| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001560| 43 55 52 20 44 4f 57 4e | 00 8a 31 5e 24 3a 20 4d |CUR DOWN|..1^$: M|
|00001570| 38 25 b2 4d 38 25 aa 31 | 3a 8b 20 4d 38 25 b1 4d |8%.M8%.1|:. M8%.M|
|00001580| 37 25 20 a7 20 4d 38 25 | b2 30 00 92 31 68 24 3a |7% . M8%|.0..1h$:|
|00001590| fe 19 00 c7 31 72 24 3a | 8b 20 4d b2 31 34 35 20 |....1r$:|. M.145 |
|000015a0| a7 20 fe 18 3a 8f 20 20 | 20 20 20 20 20 20 20 20 |. ..:.  |        |
|000015b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000015c0| 20 43 55 52 20 55 50 00 | e9 31 7c 24 3a 20 4d 38 | CUR UP.|.1|$: M8|
|000015d0| 25 b2 4d 38 25 ab 31 3a | 8b 20 4d 38 25 b3 30 20 |%.M8%.1:|. M8%.0 |
|000015e0| a7 20 4d 38 25 b2 4d 37 | 25 00 f1 31 86 24 3a fe |. M8%.M7|%..1.$:.|
|000015f0| 19 00 32 32 90 24 3a e0 | 20 31 2c 4d 43 25 aa 31 |..22.$:.| 1,MC%.1|
|00001600| 2c 4d 31 25 aa 4d 39 25 | aa 31 2c 53 55 42 4d 45 |,M1%.M9%|.1,SUBME|
|00001610| 4e 55 24 28 4d 41 25 aa | 4d 39 25 29 2c 31 3a 8f |NU$(MA%.|M9%),1:.|
|00001620| 20 20 20 20 52 45 50 52 | 49 4e 54 20 4f 50 54 49 |    REPR|INT OPTI|
|00001630| 4f 4e 00 5d 32 9a 24 3a | e0 20 31 2c 4d 43 25 aa |ON.]2.$:|. 1,MC%.|
|00001640| 31 2c 4d 31 25 aa 4d 38 | 25 aa 31 2c 53 55 42 4d |1,M1%.M8|%.1,SUBM|
|00001650| 45 4e 55 24 28 4d 41 25 | aa 4d 38 25 29 00 6a 32 |ENU$(MA%|.M8%).j2|
|00001660| a4 24 3a 4d 39 25 b2 4d | 38 25 00 95 32 ae 24 ec |.$:M9%.M|8%..2.$.|
|00001670| 20 fc 20 4d b2 31 33 20 | b0 20 4d b2 32 39 20 b0 | . M.13 |. M.29 .|
|00001680| 20 4d b2 31 35 37 20 b0 | 20 4d b2 32 37 20 b0 20 | M.157 .| M.27 . |
|00001690| 4d b2 32 35 35 00 b0 32 | b8 24 8b 20 4d b2 31 33 |M.255..2|.$. M.13|
|000016a0| 20 a7 20 4d 38 25 b2 4d | 38 25 aa 31 3a 4d b2 30 | . M8%.M|8%.1:M.0|
|000016b0| 00 c1 32 c2 24 8b 20 4d | b2 32 37 20 a7 20 4d b2 |..2.$. M|.27 . M.|
|000016c0| 31 00 d1 32 cc 24 9e 20 | d1 28 22 30 43 30 36 22 |1..2.$. |.("0C06"|
|000016d0| 29 00 d7 32 d6 24 8e 00 | dd 32 e0 24 3a 00 ff 32 |)..2.$..|.2.$:..2|
|000016e0| ea 24 8f 20 20 20 44 41 | 54 41 20 46 4f 52 20 54 |.$.   DA|TA FOR T|
|000016f0| 48 45 20 4d 45 4e 55 20 | 4f 50 54 49 4f 4e 53 00 |HE MENU |OPTIONS.|
|00001700| 11 33 f4 24 8f 20 20 20 | 54 4f 50 20 4d 45 4e 55 |.3.$.   |TOP MENU|
|00001710| 3a 00 42 33 fe 24 8f 20 | 20 20 20 20 20 20 20 20 |:.B3.$. |        |
|00001720| 31 3a 20 20 20 4e 55 4d | 42 45 52 20 4f 46 20 4f |1:   NUM|BER OF O|
|00001730| 50 54 49 4f 4e 53 20 4f | 4e 20 54 4f 50 20 4d 45 |PTIONS O|N TOP ME|
|00001740| 4e 55 00 8f 33 08 25 8f | 20 20 20 20 20 20 20 20 |NU..3.%.|        |
|00001750| 20 32 3a 20 20 20 49 53 | 20 4c 41 53 54 20 4f 50 | 2:   IS| LAST OP|
|00001760| 54 49 4f 4e 20 41 4e 20 | 49 4e 53 54 52 55 43 54 |TION AN |INSTRUCT|
|00001770| 49 4f 4e 20 57 48 49 43 | 48 20 52 45 51 55 49 52 |ION WHIC|H REQUIR|
|00001780| 45 53 20 41 20 27 59 27 | 20 4f 52 20 27 4e 27 00 |ES A 'Y'| OR 'N'.|
|00001790| c1 33 12 25 8f 20 20 20 | 20 20 20 20 20 20 20 20 |.3.%.   |        |
|000017a0| 20 20 20 4b 45 59 20 50 | 52 45 53 53 20 28 2d 31 |   KEY P|RESS (-1|
|000017b0| 20 49 46 20 59 45 53 2c | 20 30 20 49 46 20 4e 4f | IF YES,| 0 IF NO|
|000017c0| 29 00 e1 33 1c 25 8f 20 | 20 20 20 20 20 20 20 20 |)..3.%. |        |
|000017d0| 33 3a 20 20 20 4f 50 54 | 49 4f 4e 53 20 4c 49 53 |3:   OPT|IONS LIS|
|000017e0| 54 00 e7 33 26 25 8f 00 | f9 33 30 25 8f 20 20 20 |T..3&%..|.30%.   |
|000017f0| 53 55 42 20 4d 45 4e 55 | 3a 00 2c 34 3a 25 8f 20 |SUB MENU|:.,4:%. |
|00001800| 20 20 20 20 20 20 20 20 | 31 3a 20 20 20 54 4f 54 |        |1:   TOT|
|00001810| 41 4c 20 4e 55 4d 42 45 | 52 20 4f 46 20 53 55 42 |AL NUMBE|R OF SUB|
|00001820| 4d 45 4e 55 20 4f 50 54 | 49 4f 4e 53 00 5c 34 44 |MENU OPT|IONS.\4D|
|00001830| 25 8f 20 20 20 20 20 20 | 20 20 20 32 3a 20 20 20 |%.      |   2:   |
|00001840| 4e 55 4d 42 45 52 20 4f | 46 20 4f 50 54 49 4f 4e |NUMBER O|F OPTION|
|00001850| 53 20 49 4e 20 53 55 42 | 4d 45 4e 55 00 84 34 4e |S IN SUB|MENU..4N|
|00001860| 25 8f 20 20 20 20 20 20 | 20 20 20 33 3a 20 20 20 |%.      |   3:   |
|00001870| 53 55 42 4d 45 4e 55 20 | 4f 50 54 49 4f 4e 53 20 |SUBMENU |OPTIONS |
|00001880| 4c 49 53 54 00 8a 34 58 | 25 8f 00 d1 34 62 25 8f |LIST..4X|%...4b%.|
|00001890| 20 20 21 21 21 20 4e 4f | 54 45 20 2e 2e 20 4e 55 |  !!! NO|TE .. NU|
|000018a0| 4d 42 45 52 20 4f 46 20 | 53 55 42 4d 45 4e 55 53 |MBER OF |SUBMENUS|
|000018b0| 20 4d 55 53 54 20 42 45 | 20 54 48 45 20 53 41 4d | MUST BE| THE SAM|
|000018c0| 45 20 41 53 20 54 4f 50 | 20 4d 45 4e 55 20 21 21 |E AS TOP| MENU !!|
|000018d0| 21 00 d7 34 6c 25 8f 00 | dd 34 76 25 3a 00 1d 35 |!..4l%..|.4v%:..5|
|000018e0| 80 25 83 20 35 3a 8f 20 | 20 20 20 20 20 20 20 20 |.%. 5:. |        |
|000018f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001900| 4e 55 4d 42 45 52 20 4f | 46 20 45 4e 54 52 49 45 |NUMBER O|F ENTRIE|
|00001910| 53 20 4f 4e 20 54 4f 50 | 20 4d 45 4e 55 00 5d 35 |S ON TOP| MENU.]5|
|00001920| 8a 25 83 20 2d 31 3a 8f | 20 20 20 20 20 20 20 20 |.%. -1:.|        |
|00001930| 49 46 20 4c 41 53 54 20 | 4f 50 54 49 4f 4e 20 49 |IF LAST |OPTION I|
|00001940| 53 20 45 58 49 54 2f 45 | 4e 44 2f 45 54 43 20 54 |S EXIT/E|ND/ETC T|
|00001950| 48 45 4e 20 2d 31 20 45 | 4c 53 45 20 30 00 69 35 |HEN -1 E|LSE 0.i5|
|00001960| 94 25 83 20 22 ce 45 57 | 22 00 7b 35 9e 25 83 20 |.%. ".EW|".{5.%. |
|00001970| 22 c3 48 41 52 41 43 54 | 45 52 22 00 88 35 a8 25 |".HARACT|ER"..5.%|
|00001980| 83 20 22 c4 49 53 4b 22 | 00 97 35 b2 25 83 20 22 |. ".ISK"|..5.%. "|
|00001990| cf 55 54 50 55 54 22 00 | a4 35 bc 25 83 20 22 c5 |.UTPUT".|.5.%. ".|
|000019a0| 58 49 54 22 00 aa 35 c6 | 25 3a 00 c4 35 d0 25 8f |XIT"..5.|%:..5.%.|
|000019b0| 20 20 56 45 52 54 49 43 | 41 4c 20 4d 45 4e 55 20 |  VERTIC|AL MENU |
|000019c0| 42 41 52 53 00 ca 35 da | 25 3a 00 03 36 e4 25 83 |BARS..5.|%:..6.%.|
|000019d0| 20 32 32 3a 8f 20 20 20 | 20 20 20 20 20 20 20 20 | 22:.   |        |
|000019e0| 20 20 20 20 20 20 20 20 | 54 4f 54 41 4c 20 4e 55 |        |TOTAL NU|
|000019f0| 4d 42 45 52 20 4f 46 20 | 53 55 42 20 4f 50 54 49 |MBER OF |SUB OPTI|
|00001a00| 4f 4e 53 00 09 36 ee 25 | 3a 00 49 36 f8 25 83 20 |ONS..6.%|:.I6.%. |
|00001a10| 34 3a 8f 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |4:.     |        |
|00001a20| 20 20 20 20 20 20 20 4e | 55 4d 42 45 52 20 4f 46 |       N|UMBER OF|
|00001a30| 20 4f 50 54 49 4f 4e 53 | 20 49 4e 20 45 41 43 48 | OPTIONS| IN EACH|
|00001a40| 20 53 55 42 20 4d 45 4e | 55 00 63 36 02 26 83 20 | SUB MEN|U.c6.&. |
|00001a50| 22 d5 50 50 20 43 41 53 | 45 20 54 45 4d 50 4c 41 |".PP CAS|E TEMPLA|
|00001a60| 54 45 22 00 7d 36 0c 26 | 83 20 22 cc 57 52 20 43 |TE".}6.&|. ".WR C|
|00001a70| 41 53 45 20 54 45 4d 50 | 4c 41 54 45 22 00 93 36 |ASE TEMP|LATE"..6|
|00001a80| 16 26 83 20 22 cc 4f 41 | 44 20 54 45 4d 50 4c 41 |.&. ".OA|D TEMPLA|
|00001a90| 54 45 22 00 aa 36 20 26 | 83 20 22 c5 4d 50 54 59 |TE"..6 &|. ".MPTY|
|00001aa0| 20 54 45 4d 50 4c 41 54 | 45 22 00 b0 36 2a 26 3a | TEMPLAT|E"..6*&:|
|00001ab0| 00 b8 36 34 26 83 20 37 | 00 c8 36 3e 26 83 20 22 |..64&. 7|..6>&. "|
|00001ac0| d2 cf cd 20 d3 45 54 22 | 00 d8 36 48 26 83 20 22 |... .ET"|..6H&. "|
|00001ad0| d2 45 53 54 4f 52 45 22 | 00 e6 36 52 26 83 20 22 |.ESTORE"|..6R&. "|
|00001ae0| c3 4c 45 41 52 22 00 f3 | 36 5c 26 83 20 22 c6 49 |.LEAR"..|6\&. ".I|
|00001af0| 4c 4c 22 00 00 37 66 26 | 83 20 22 d3 57 4f 50 22 |LL"..7f&|. ".WOP"|
|00001b00| 00 12 37 70 26 83 20 22 | c3 4f 50 59 20 46 52 4f |..7p&. "|.OPY FRO|
|00001b10| 4d 22 00 22 37 7a 26 83 | 20 22 c3 4f 50 59 20 54 |M"."7z&.| ".OPY T|
|00001b20| 4f 22 00 28 37 84 26 3a | 00 30 37 8e 26 83 20 35 |O".(7.&:|.07.&. 5|
|00001b30| 00 44 37 98 26 83 20 22 | c4 49 53 4b 20 c4 45 56 |.D7.&. "|.ISK .EV|
|00001b40| 49 43 45 22 00 57 37 a2 | 26 83 20 22 c4 49 53 4b |ICE".W7.|&. ".ISK|
|00001b50| 20 c4 52 49 56 45 22 00 | 69 37 ac 26 83 20 22 c4 | .RIVE".|i7.&. ".|
|00001b60| 49 52 45 43 54 4f 52 59 | 22 00 78 37 b6 26 83 20 |IRECTORY|".x7.&. |
|00001b70| 22 c5 52 52 4f 52 53 22 | 00 87 37 c0 26 83 20 22 |".RRORS"|..7.&. "|
|00001b80| c4 45 4c 45 54 45 22 00 | 8d 37 ca 26 3a 00 95 37 |.ELETE".|.7.&:..7|
|00001b90| d4 26 83 20 35 00 ac 37 | de 26 83 20 22 d0 52 49 |.&. 5..7|.&. ".RI|
|00001ba0| 4e 54 45 52 20 c4 45 56 | 49 43 45 22 00 c9 37 e8 |NTER .EV|ICE"..7.|
|00001bb0| 26 83 20 22 c3 48 41 52 | 20 c4 41 54 41 20 54 4f |&. ".HAR| .ATA TO|
|00001bc0| 20 d0 52 49 4e 54 45 52 | 22 00 e4 37 f2 26 83 20 | .RINTER|"..7.&. |
|00001bd0| 22 d3 45 54 20 c4 41 54 | 41 20 54 4f 20 d3 43 52 |".ET .AT|A TO .CR|
|00001be0| 45 45 4e 22 00 00 38 fc | 26 83 20 22 d3 45 54 20 |EEN"..8.|&. ".ET |
|00001bf0| c4 41 54 41 20 54 4f 20 | d0 52 49 4e 54 45 52 22 |.ATA TO |.RINTER"|
|00001c00| 00 19 38 06 27 83 20 22 | d3 45 54 20 c4 41 54 41 |..8.'. "|.ET .ATA|
|00001c10| 20 54 4f 20 c4 49 53 4b | 22 00 1f 38 10 27 3a 00 | TO .ISK|"..8.':.|
|00001c20| 27 38 1a 27 83 20 31 00 | 44 38 24 27 83 20 22 c1 |'8.'. 1.|D8$'. ".|
|00001c30| 52 45 20 59 4f 55 20 53 | 55 52 45 20 3f 20 28 59 |RE YOU S|URE ? (Y|
|00001c40| 2f 4e 29 22 00 4a 38 2e | 27 3a 00 50 38 38 27 80 |/N)".J8.|':.P88'.|
|00001c50| 00 00 00                |                         |...     |        |
+--------+-------------------------+-------------------------+--------+--------+